home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Languages Suite
/
ProgramD2.iso
/
Borland
/
Borland C++ V5.02
/
APPEXPRT.PAK
/
CADDSYM.SNP
< prev
next >
Wrap
Text File
|
1997-05-06
|
2KB
|
47 lines
##QUERY_BASE_NAME [[BaseName]]
##--BEGIN-- QUERY_CLASS_NAME [[ClassName]]
## "//{{[[ClassName]] Implementation}}" [[ClassMarker]]
## \\ClassMarker [[LookUp]]
## QUERY_FILE_CPP [[FileName]]
## ^BOF
## ? LookUp [[Search]]
## Search == FALSE
## :%\\"Unable to add automation symbol table marker to [[FileName]]. "
##*
## ^BOL
## --BEGIN-- @QUERY_APPL_COMMENT == VALUE_VERBOSE
//
// OLE's ITypeInfo browses this symbol table for a list of all data,
// properties, and methods exposed by this automated class.
//
## --END-- @QUERY_APPL_COMMENT == VALUE_VERBOSE
## \\"DEFINE_AUTOCLASS([[ClassName]])" [[DefineMacro]]
## "END_AUTOCLASS" [[EndMacro]]
## "tfNormal" [[Flags]]
## --BEGIN-- TRUE
## --BEGIN-- QUERY_BASE_NAME [[BaseName]]
## :BaseName == "TApplication"
## :"tfAppObject | tfCanCreate" Flags
##*
## --BEGIN-- @QUERY_APPL_OLE != VALUE_NOOLE
## :BaseName == "TApplication"
## :\\"DEFINE_AUTOAGGREGATE([[ClassName]], OcApp->Aggregate)" DefineMacro
## :"END_AUTOAGGREGATE" EndMacro
##*
## --END-- @QUERY_APPL_OLE != VALUE_NOOLE
## --END-- QUERY_BASE_NAME [[BaseName]]
[[DefineMacro]]
## <<TApplication QUERY_CLASS_NAME [[TApplicationName]] 2
EXPOSE_APPLICATION([[TApplicationName]], "Application", "Application object", 0)
## TApplicationName == ClassName
EXPOSE_QUIT("Quit", "Quit application", 0)
//{{[[ClassName]]SYM_TBL_BEGIN}}
//{{[[ClassName]]SYM_TBL_END}}
[[EndMacro]]([[ClassName]], [[Flags]], "[[ClassName]]", 0, 0);
## --END-- TRUE
##^-3
##^BOL
##--END-- QUERY_CLASS_NAME [[ClassName]]